CAAGlobe_DistanceBetweenPoints <-
function(GeographicalLatitude1, GeographicalLongitude1, GeographicalLatitude2, GeographicalLongitude2){
.Call("CAAGlobe_DistanceBetweenPoints", GeographicalLatitude1, GeographicalLongitude1, GeographicalLatitude2, GeographicalLongitude2)
}
